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The compiler now has a tracing feature which is equivalent 
to the TRAGUS feature of the interpreter. COMPILE MODE is a 
function of one argument which must be either TRACE or NORMAL. 

When the triplet 

COMPILEMODE (TRACE) () 

is given, subsequent COMPEF statements will cause the functions 
mentioned to be redefined and compiled. Each function is redefined 
so that it will print its arguments when it is entered and print 
its value when it is exited. The printing for each function is 
controlled by a free variable which has the same name as the func¬ 
tion. These variabl€*s are 3et to M l w by the function TRACK and 
set to -0“ by the function UNTRACK. TRACK and UNTRACK have one 
argument which is a list of names of functions. Only those func¬ 
tions which were compiled when the system was in TRACE-mode can be 
given as arguments to TRACK uod UNTRACK. Other functions will 

cause an error. 

Thus, if PI and F2 are two functions which were compiled in 
TRACE-mcde 

TRACK {(F1,F2)) () 

will cause the free variables FI and F2 to be set to 1 • Sub¬ 
sequently, when either of the functions FI or F2 is entered, the 
arguments are printed and when either of these functions is exited, 

the value is printed. The triplet 

UNTRACK ((FI)) {) 

will cause this printing to be turned off (the free variable FI is 
set to "0")» However, the trace-printing for the function F2 will 



still continue until the triplet 

BHSRACK (frE)) () 

is given. 

■ 1 f , 

the system is put in )KXtMAL*ao(fcs 
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